; flags
; flag 0: turns DEBUG mode on and off
; flag 1: light in stacks is off or on
; flag 2: on if black cassette has been played once
; flag 3: on if black cassette has been played twice
; flag 4: on if white cassette has been played (player knows Linear
;     B)
; flag 5: on if player has read Hazel Motes' Note
;     (needs to be on before player can exit room)
; flag 6: on if player has been in featureless chamber once
; flag 7: on if globe counter is on
; flag 8: on if globe has been spun to restore darkness
; flag 9: on if globe 2 has been described once
; flag 10: on if MORTIS command has been used
; flag 11: on if papyrus/poet's clue has been read
; flag 12: on if car has been named
; flag 13: on if player has uttered objectionable words once
; flag 14: on if player has uttered objectionable words twice
; flag 15: on if player has cut off one hand
; flag 16: on if player has cut off both hands
; flag 17: on if player has been identified as an ALA member
; flag 18: on if ALA commands are working
; flag 19: on if player has tried to read the brown book
; flag 20: on if genie has been requested to open safe
; flag 21: on if question 1 has been answered correctly
; flag 22: on if question 2 has been answered correctly
; flag 23: on if question 3 has been answered correctly
; flag 24: on if player has fed coins into Coke machine
; flag 25: on if player has been transported
; flag 26: on if guard has exploded
; flag 27: on if player is in maze
; flag 28: on if player has said "Fiat" in dark room
; flag 29: on if player has seen vision
; flag 30: on if player has received message "Ooh gross." (Msg. 105)
; flag 101: on if player can read note 1
; flag 102: on if player can read note 2
;     and so on through flag 120
; counters
; counter 1: on when score reaches 100
;    player has 5 moves before getting sent to Carnegie Room
; counter 2: on after player gets to Carnegie Room
;    player has 10 moves to spin globe
; variables
; variable 1: incremented when player hits head on shelf
;    player dies if variable reaches 5

COMMAND ANY
FlagON 7 ; globe counter is on
FlagOFF 8 ; globe has not been spun
AtLocationLT 22 ; Player is at location less than PS-Q Room
 OR 
AtLocation 25 ; Player is located at East Hallway
 OR 
AtLocation 30 ; Player is located at Middle of West Stairwell
 OR 
AtLocation 31 ; Player is located at West Hallway
 OR 
AtLocation 32 ; Player is located at Stairwell
TurnFlagON 253 
END_COMMAND

COMMAND ANY
FlagON 7 ; globe counter is on
FlagOFF 8 ; globe has not been spun
FlagON 253 
 OR 
AtLocation 34 ; Player is located at East of Reading Room
 OR 
AtLocation 35 ; Player is located at Center of Reading Room 
 OR 
AtLocation 39 ; Player is located at Vertical Files
TurnFlagOFF 253 
PrintMessage 123 ; It is beginning to get light outside.
END_COMMAND

COMMAND ANY
Chance 2 ; 2% of returning TRUE?
NOT AtLocation 199 ; Player is NOT located at Cage in Dungeon
VerbIsDirection ; is trying to leave?
PrintMessage 99 ; Your footsteps have disturbed a mouse that
END_COMMAND

COMMAND ANY
FlagOFF 26 ; guard has not exploded
Chance 5 ; 5% of returning TRUE?
NOT Present 250 ; SECURITY GUARD is NOT here?
AtLocationGT 14 ; Player is at location greater than Center of East
NOT AtLocation 131 ; Player is NOT located at Featureless Chamber
NOT AtLocation 26 ; Player is NOT located at FHC Reading Room
NOT AtLocation 27 ; Player is NOT located at FHC Office
FlagOFF 27 ; player is not in maze
TurnFlagON 249 ; Turn flag number 249 ON
END_COMMAND

COMMAND ANY
FlagON 249 ; Flag number 249 is ON?
TurnFlagOFF 249 ; Turn flag number 249 OFF
NOT AtLocation 107 ; Player is NOT located at Center of N/S Hallway
NOT AtLocation 108 ; Player is NOT located at Circulation
NOT AtLocation 109 ; Player is NOT located at North of N/S Hallway
NOT AtLocation 111 ; Player is NOT located at Dungeon
PutInCurrentRoom 250 ; Put noun (SECURITY GUARD) in current room
PrintMessage 52 ; Before you can do anything, you hear a rustling
TurnFlagON 107 
DoneWithTurn
END_COMMAND

COMMAND ANY
Present 250 ; SECURITY GUARD is here?
VerbIsDirection ; is trying to leave?
Chance 20 ; 20% of returning TRUE?
PrintMessage 54 ; The humongous giant security guard raises his
Destroy 250 ; Destroy noun (SECURITY GUARD)
GoToRoom 2 ; Go to location 2 -- Outside Library
DoneWithTurn
END_COMMAND

COMMAND ANY
Present 250 ; SECURITY GUARD is here?
VerbIsDirection ; is trying to leave?
PrintMessage 53 ; The humongous giant security guard will not let
DoneWithTurn
END_COMMAND

COMMAND ANY
AtLocation 195 ; Player is located at none
PrintMessage 4 ; There is no escape.
DoneWithTurn
END_COMMAND

COMMAND ANY
AtLocation 199 ; Player is located at Cage in Dungeon
PrintMessage 5 ; There is no escape.
DoneWithTurn
END_COMMAND

COMMAND ANY
ScoreGT 100 ; Score of game is greater than 100 points?
FlagOFF 8 ; globe has not been spun
FlagOFF 7 ; globe counter is off
TurnFlagON 7 ; Turn globe counter on
TurnCounterON 1 ; globe counter
END_COMMAND

COMMAND ANY
FlagOFF 25 ; player has not been transported
FlagON 7 ; globe counter is on
FlagOFF 8 ; globe has not been spun
NOT AtLocation 131 ; Player is NOT located at Featureless Chamber
NOT AtLocation 116 ; Player is NOT located at Poet's Office
FlagOFF 27 ; player is not in maze
CounterGT 1 4 ; Counter number 1 is greater than 4?
ClearScreen ; Clear the screen 
PrintMessage 122 ; Before you can move, a librarian appears before
GoToRoom 4 ; Go to location 4 -- South Carnegie Room
SwapLocations 257 258 ; Swap locations of nouns  (HUGE GLOBE) and
TurnFlagON 25 ; player has been transported
TurnCounterON 2 ; Turn globe counter number 2 ON
DoneWithTurn
END_COMMAND

COMMAND ANY
CounterEquals 2 10 ; Counter number 2 is equal to 10?
PrintMessage 124 ; You hear a noise behind you. You turn around and
EndGame ; Game ends at end of turn
DoneWithTurn
END_COMMAND

COMMAND ANY
Chance 13 ; 13% of returning TRUE?
VerbIsDirection ; is trying to leave?
FlagON 27 ; player is in maze
FlagOFF 29 ; player has not seen vision
NOT AtLocation 103 ; Player is NOT located at East Inactive Room
NOT AtLocation 130 ; Player is NOT located at Twisty little
ClearScreen ; clear the screen
RandomMessage 37 39 ; Print random message between 37 and 39
WaitForReturn ; Display "Hit RETURN" message
ClearScreen ; clear the screen
TurnFlagON 124 ; Turn flag number 124 ON
TurnFlagON 29 ; player has seen vision
END_COMMAND

COMMAND ANY
AtLocation 130 ; Player is located at Twisty little passages
VerbIsDirection ; is trying to leave?
FlagON 6 ; player has been in featureless chamber
TurnFlagON 105 ; Turn flag number 105 ON
GoToRoom 103 ; Go to location 103 -- East Inactive Room
TurnFlagOFF 29 ; player has exited maze
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 5 ; Player is located at Globe Room
Present 258 ; HUGE GLOBE is here?
FlagON 7 ; globe counter is on
FlagOFF 8 ; globe has not been spun
FlagOFF 9 ; globe 2 has not been described
PrintMessage 126 ; Before you turn away, you pause to look at the
DescribeThing 258 ; Describe item 258 (HUGE GLOBE)
TurnFlagON 9 ; globe 2 has been described
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 21 ; Player is located at Entrance to Stacks
IsLocked 270 ; STEEL DOOR is LOCKED?
PrintMessage 70 ; The door is locked.
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 21 ; Player is located at Entrance to Stacks
IsUnLocked 270 ; STEEL DOOR is UNLOCKED?
IsClosed 270 ; STEEL DOOR is CLOSED?
PrintMessage 71 ; The passage to the north is blocked by a steel
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 21 ; Player is located at Entrance to Stacks
IsUnLocked 270 ; STEEL DOOR is UNLOCKED?
IsOpen 270 ; STEEL DOOR is OPEN?
FlagON 1 ; light in stacks
GoToRoom 22 ; Go to location 22 -- PS-Q Room
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 21 ; Player is located at Entrance to Stacks
IsUnLocked 270 ; STEEL DOOR is UNLOCKED?
IsOpen 270 ; STEEL DOOR is OPEN?
FlagOFF 1 ; light in stacks
VariableLT 1 4 ; Variable number 1 is less than 4?
PrintMessage 61 ; The room you enter is pitch black. You wander
AddToVariable 1 1 ; Increase variable number 1 by 1
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 21 ; Player is located at Entrance to Stacks
IsUnLocked 270 ; STEEL DOOR is UNLOCKED?
IsOpen 270 ; STEEL DOOR is OPEN?
FlagOFF 1 ; light in stacks
VariableEquals 1 4 ; Variable number 1 is equal to 4?
PrintMessage 62 ; The room you enter is pitch black. You wander
AddToVariable 1 1 ; Increase variable number 1 by 1
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 21 ; Player is located at Entrance to Stacks
IsUnLocked 270 ; STEEL DOOR is UNLOCKED?
IsOpen 270 ; STEEL DOOR is OPEN?
FlagOFF 1 ; light in stacks
VariableEquals 1 5 ; Variable number 1 is equal to 5?
PrintMessage 63 ; The room you enter is pitch black. You wander
PutInCurrentRoom 285 ; Put noun (DRIED BLOOD) in current room
SetVariableTo 1 4 ; Set variable number 1 to 4
KillPlayer ; Kill Player at end of turn!
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 141 ; Player is located at Outside Media Center
IsLocked 272 ; WOODEN DOOR is LOCKED?
PrintMessage 72 ; The passage to the north is blocked by a wooden
PrintMessage 70 ; The door is locked.
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 141 ; Player is located at Outside Media Center
IsUnLocked 272 ; WOODEN DOOR is UNLOCKED?
IsClosed 272 ; WOODEN DOOR is CLOSED?
PrintMessage 72 ; The passage to the north is blocked by a wooden
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 141 ; Player is located at Outside Media Center
IsUnLocked 272 ; WOODEN DOOR is UNLOCKED?
IsOpen 272 ; WOODEN DOOR is OPEN?
GoToRoom 144 ; Go to location 144 -- Media Center
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 144 ; Player is located at Media Center
NOT Present 201 ; GREY KITTEN is NOT here?
PrintMessage 104 ; You can't see anything in that direction.
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 40 ; Player is located at NUC Room 
IsLocked 273 ; STEEL DOOR is LOCKED?
PrintMessage 70 ; The door is locked.
PrintMessage 71 ; The passage to the north is blocked by a steel
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 40 ; Player is located at NUC Room 
IsUnLocked 273 ; STEEL DOOR is UNLOCKED?
IsClosed 273 ; STEEL DOOR is CLOSED?
PrintMessage 71 ; The passage to the north is blocked by a steel
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 40 ; Player is located at NUC Room 
IsUnLocked 273 ; STEEL DOOR is UNLOCKED?
IsOpen 273 ; STEEL DOOR is OPEN?
GoToRoom 20 ; Go to location 20 -- Technical Processing Room
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 144 ; Player is located at Media Center
IsLocked 274 ; STEEL DOOR is LOCKED?
PrintMessage 70 ; The door is locked.
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 144 ; Player is located at Media Center
IsUnLocked 274 ; STEEL DOOR is UNLOCKED?
IsClosed 274 ; STEEL DOOR is CLOSED?
PrintMessage 71 ; The passage to the north is blocked by a steel
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 144 ; Player is located at Media Center
IsUnLocked 274 ; STEEL DOOR is UNLOCKED?
IsOpen 274 ; STEEL DOOR is OPEN?
GoToRoom 145 ; Go to location 145 -- Microfilm Room
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 109 ; Player is located at North of N/S Hallway
IsLocked 275 ; IRON DOOR is LOCKED?
PrintMessage 73 ; The passage to the north is blocked by an iron
PrintMessage 70 ; The door is locked.
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 109 ; Player is located at North of N/S Hallway
IsUnLocked 275 ; IRON DOOR is UNLOCKED?
IsClosed 275 ; IRON DOOR is CLOSED?
PrintMessage 73 ; The passage to the north is blocked by an iron
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 109 ; Player is located at North of N/S Hallway
IsUnLocked 275 ; IRON DOOR is UNLOCKED?
IsOpen 275 ; IRON DOOR is OPEN?
GoToRoom 111 ; Go to location 111 -- Dungeon
TurnFlagON 106 ; Turn flag number 106 ON
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 103 ; Player is located at East Inactive Room
IsLocked 276 ; STEEL DOOR is LOCKED?
PrintMessage 71 ; The passage to the north is blocked by a steel
PrintMessage 70 ; The door is locked.
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 103 ; Player is located at East Inactive Room
IsUnLocked 276 ; STEEL DOOR is UNLOCKED?
IsClosed 276 ; STEEL DOOR is CLOSED?
PrintMessage 71 ; The passage to the north is blocked by a steel
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 103 ; Player is located at East Inactive Room
IsUnLocked 276 ; STEEL DOOR is UNLOCKED?
IsOpen 276 ; STEEL DOOR is OPEN?
IsCarryingSomething ; Player is carrying something?
PrintMessage 77 ; Something you're carrying won't fit through the
DoneWithTurn
END_COMMAND

COMMAND NORTH
FlagOFF 6 ; player has not been in featureless chamber 
AtLocation 103 ; Player is located at East Inactive Room
IsUnLocked 276 ; STEEL DOOR is UNLOCKED?
IsOpen 276 ; STEEL DOOR is OPEN?
IsCarryingNothing ; Player is carrying nothing?
GoToRoom 121 ; Go to location 121 -- Twisty little passages
DoneWithTurn
END_COMMAND

COMMAND NORTH
FlagON 6 ; player has been in featureless chamber
AtLocation 103 ; Player is located at East Inactive Room
IsUnLocked 276 ; STEEL DOOR is UNLOCKED?
IsOpen 276 ; STEEL DOOR is OPEN?
IsCarryingNothing ; Player is carrying nothing?
GoToRandomRoom 121 130 ; Go to random location between Twisty 
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 19 ; Player is located at North Hallway
IsLocked 277 ; STEEL DOOR is LOCKED?
PrintMessage 71 ; The passage to the north is blocked by a steel 
PrintMessage 70 ; The door is locked.  
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 19 ; Player is located at North Hallway
IsUnLocked 277 ; STEEL DOOR is UNLOCKED?
IsClosed 277 ; STEEL DOOR is CLOSED?
PrintMessage 71 ; The passage to the north is blocked by a steel
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 19 ; Player is located at North Hallway
IsOpen 277 ; STEEL DOOR is OPEN?
GoToRoom 40 ; Go to location 40 -- NUC Room 
TurnFlagON 104 ; Turn flag number 104 ON
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 17 ; Player is located at Secretary's Office
Present 280 ; WOODEN DOOR is here?
PrintMessage 72 ; The passage to the north is blocked by a wooden
PrintMessage 70 ; The door is locked. 
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 17 ; Player is located at Secretary's Office
Present 281 ; WOODEN DOOR is here?
IsClosed 281 ; WOODEN DOOR is CLOSED?
PrintMessage 75 ; You need to open the door first!
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 27 ; Player is located at FHC Office
FlagON 1 ; lights in stacks
GoToRoom 29 ; Go to location 29 -- FHC Stacks
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 27 ; Player is located at FHC Office
FlagOFF 1 ; lights in stacks
VariableLT 1 4 ; Variable number 1 is less than 4?
PrintMessage 61 ; The room you enter is pitch black. You wander
AddToVariable 1 1 ; Increase variable number 1 by 1
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 27 ; Player is located at FHC Office
FlagOFF 1 ; lights in stacks
VariableEquals 1 4 ; Variable number 1 is equal to 4?
PrintMessage 62 ; The room you enter is pitch black. You wander
AddToVariable 1 1 ; Increase variable number 1 by 1
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 27 ; Player is located at FHC Office
FlagOFF 1 ; lights in stacks
VariableEquals 1 5 ; Variable number 1 is equal to 5?
PrintMessage 63 ; The room you enter is pitch black. You wander
PutInCurrentRoom 287 ; Put noun (DRIED BLOOD) in current room
SetVariableTo 1 4 ; Set variable number 1 to 4
KillPlayer ; Kill Player at end of turn!
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 116 ; Player is located at Poet's Office
IsCarrying 230 ; ANCIENT PAPYRUS is being carried?
FlagON 11 ; papyrus has been read
PrintMessage 116 ; The papyrus crumbles in your hands.
Destroy 230 ; Destroy noun (ANCIENT PAPYRUS)
END_COMMAND

COMMAND NORTH
AtLocation 116 ; Player is located at Poet's Office
IsCarrying 230 ; ANCIENT PAPYRUS is being carried?
FlagOFF 11 ; papyrus has not been read
PrintMessage 117 ; You start to leave the room, but turn back
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 31 ; Player is located at West Hallway
GoToRoom 34 ; Go to location 34 -- East of Reading Room
TurnFlagOn 248 ;temp flag
FirstVisitToRoom ; is Player's first visit to current location?
PrintMessage 103 ; You hear something meow. 
TurnFlagOff 248 ;temp flag
DoneWithTurn
END_COMMAND

COMMAND NORTH
FlagOn 248 ;temp flag
TurnFlagOff 248 ;temp flag
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 26 ; Player is located at FHC Reading Room
IsLocated 251 27 ; ENORMOUS GENIE is located at FHC Office?
GoToRoom 27 ; Go to location 27 -- FHC Office
LookAtRoom ; Give verbose description of current room
PrintMessage 132 ; As you enter the room, a voice booms "WHAT DOES
DoneWithTurn
END_COMMAND

COMMAND NORTH
AtLocation 74 ; Player is located at North end of Dank Hallway
TurnFlagON 109 ; Turn flag number 109 ON
END_COMMAND

COMMAND SOUTH
AtLocation 5 ; Player is located at Globe Room
Present 258 ; HUGE GLOBE is here?
FlagON 7 ; globe counter is on
FlagOFF 8 ; globe has not been spun
FlagOFF 9 ; globe has not been described
PrintMessage 126 ; Before you turn away, you pause to look at the 
DescribeThing 258 ; Describe item 258 (HUGE GLOBE)
TurnFlagON 9 ; globe has been described
DoneWithTurn
END_COMMAND

COMMAND SOUTH
AtLocation 20 ; Player is located at Technical Processing Room
IsOpen 243 ; COFFEE POT is OPEN?
CloseIt 243 ; Close noun (COFFEE POT)
PrintMessage 43 ; As you leave the room, the lid of the coffee pot 
END_COMMAND

COMMAND SOUTH
AtLocation 22 ; Player is located at PS-Q Room
IsClosed 270 ; STEEL DOOR is CLOSED?
PrintMessage 74 ; Your way south is blocked by a door. The door can
DoneWithTurn
END_COMMAND

COMMAND SOUTH
AtLocation 40 ; Player is located at NUC Room 
IsClosed 277 ; STEEL DOOR is CLOSED?
PrintMessage 74 ; Your way south is blocked by a door. The door can
DoneWithTurn
END_COMMAND

COMMAND SOUTH
AtLocation 29 ; Player is located at FHC Stacks
IsLocated 251 27 ; ENORMOUS GENIE is located at FHC Office?
GoToRoom 27 ; Go to location 27 -- FHC Office
LookAtRoom ; Give verbose description of current room
PrintMessage 132 ; As you enter the room, a voice booms "WHAT DOES
DoneWithTurn
END_COMMAND

COMMAND SOUTH
AtLocation 2 ; Player is located at Outside Library
PrintMessage 100 ; You wander around outside for a few minutes, but
DoneWithTurn
END_COMMAND

COMMAND SOUTH
AtLocation 20 ; Player is located at Technical Processing Room
TurnFlagON 104 ; Turn flag number 104 ON
END_COMMAND

COMMAND EAST
AtLocation 104 ; Player is located at Top of West Stairwell
FlagON 1 ; lights in stacks
GoToRoom 102 ; Go to location 102 -- A-BR Room
DoneWithTurn
END_COMMAND

COMMAND EAST
AtLocation 104 ; Player is located at Top of West Stairwell
FlagOFF 1 ; lights in stacks
VariableLT 1 4 ; Variable number 1 is less than 4?
PrintMessage 61 ; The room you enter is pitch black. You wander
AddToVariable 1 1 ; Increase variable number 1 by 1
DoneWithTurn
END_COMMAND

COMMAND EAST
AtLocation 104 ; Player is located at Top of West Stairwell
FlagOFF 1 ; lights in stacks
VariableEquals 1 4 ; Variable number 1 is equal to 4?
PrintMessage 62 ; The room you enter is pitch black. You wander
AddToVariable 1 1 ; Increase variable number 1 by 1
DoneWithTurn
END_COMMAND

COMMAND EAST
AtLocation 104 ; Player is located at Top of West Stairwell
FlagOFF 1 ; lights in stacks
VariableEquals 1 5 ; Variable number 1 is equal to 5?
PrintMessage 63 ; The room you enter is pitch black. You wander
PutInCurrentRoom 289 ; Put noun (DRIED BLOOD) in current room
SetVariableTo 1 4 ; Set variable number 1 to 4
KillPlayer ; Kill Player at end of turn!
DoneWithTurn
END_COMMAND

COMMAND EAST
AtLocation 117 ; Player is located at West Inactive Room
Present 252 ; THREATENING GHOST is here?
PrintMessage 110 ; The ghost will not let you pass.
DoneWithTurn
END_COMMAND

COMMAND EAST
AtLocation 27 ; Player is located at FHC Office
Present 254 ; THREATENING LIBRARIAN is here?
PrintMessage 20 ; The librarian will not let you go in that 
DoneWithTurn
END_COMMAND

COMMAND EAST
AtLocation 27 ; Player is located at FHC Office
Present 283 ; IMMENSE SAFE is here?
GoToRoom 198 ; Go to location 198 -- Inside the Safe
DoneWithTurn
END_COMMAND

COMMAND EAST
AtLocation 27 ; Player is located at FHC Office
Present 282 ; IMMENSE SAFE is here?
NOT Present 254 ; THREATENING LIBRARIAN is NOT here?
PrintMessage 148 ; The door to the safe is locked. 
DoneWithTurn
END_COMMAND

COMMAND EAST
AtLocation 2 ; Player is located at Outside Library
PrintMessage 100 ; You wander around outside for a few minutes, but
DoneWithTurn
END_COMMAND

COMMAND EAST
AtLocation 23 ; Player is located at Q-QE Room
TurnFlagON 104 ; Turn flag number 104 ON
END_COMMAND

COMMAND EAST
AtLocation 63 ; Player is located at Center of H-PR Room
TurnFlagON 108 ; Turn flag number 108 ON
END_COMMAND

COMMAND EAST
AtLocation 117 ; Player is located at West Inactive Room
TurnFlagON 27 ; player is in maze
TurnFlagON 105 ; Turn flag number 105 ON
END_COMMAND

COMMAND WEST
AtLocation 40 ; Player is located at NUC Room 
FlagON 1 ; lights in stacks
GoToRoom 23 ; Go to location 23 -- Q-QE Room
DoneWithTurn
END_COMMAND

COMMAND WEST
AtLocation 40 ; Player is located at NUC Room 
FlagOFF 1 ; lights in stacks
VariableLT 1 4 ; Variable number 1 is less than 4?
PrintMessage 61 ; The room you enter is pitch black. You wander
AddToVariable 1 1 ; Increase variable number 1 by 1
DoneWithTurn
END_COMMAND

COMMAND WEST
AtLocation 40 ; Player is located at NUC Room 
FlagOFF 1 ; lights in stacks
VariableEquals 1 4 ; Variable number 1 is equal to 4?
PrintMessage 62 ; The room you enter is pitch black. You wander 
AddToVariable 1 1 ; Increase variable number 1 by 1
DoneWithTurn
END_COMMAND

COMMAND WEST
AtLocation 40 ; Player is located at NUC Room 
FlagOFF 1 ; lights in stacks
VariableEquals 1 5 ; Variable number 1 is equal to 5?
PrintMessage 63 ; The room you enter is pitch black. You wander
PutInCurrentRoom 286 ; Put noun (DRIED BLOOD) in current room
SetVariableTo 1 4 ; Set variable number 1 to 4
KillPlayer ; Kill Player at end of turn!
DoneWithTurn
END_COMMAND

COMMAND WEST
AtLocation 112 ; Player is located at Top of East Stairwell
FlagON 1 ; lights in stacks
GoToRoom 102 ; Go to location 102 -- A-BR Room
DoneWithTurn
END_COMMAND

COMMAND WEST
AtLocation 112 ; Player is located at Top of East Stairwell
FlagOFF 1 ; lights in stacks
VariableLT 1 4 ; Variable number 1 is less than 4?
PrintMessage 61 ; The room you enter is pitch black. You wander
AddToVariable 1 1 ; Increase variable number 1 by 1
DoneWithTurn
END_COMMAND

COMMAND WEST
AtLocation 112 ; Player is located at Top of East Stairwell
FlagOFF 1 ; lights in stacks
VariableEquals 1 4 ; Variable number 1 is equal to 4?
PrintMessage 62 ; The room you enter is pitch black. You wander
AddToVariable 1 1 ; Increase variable number 1 by 1
DoneWithTurn
END_COMMAND

COMMAND WEST
AtLocation 112 ; Player is located at Top of East Stairwell
FlagOFF 1 ; lights in stacks
VariableEquals 1 5 ; Variable number 1 is equal to 5?
PrintMessage 63 ; The room you enter is pitch black. You wander
SetVariableTo 1 4 ; Set variable number 1 to 4
PutInCurrentRoom 288 ; Put noun (DRIED BLOOD) in current room
KillPlayer ; Kill Player at end of turn!
DoneWithTurn
END_COMMAND

COMMAND WEST
AtLocation 146 ; Player is located at Media Card Catalog
FlagON 3 ; black cassette has been played twice
PrintMessage 35 ; Your way is blocked by several tons of plaster.
DoneWithTurn
END_COMMAND

COMMAND WEST
AtLocation 103 ; Player is located at East Inactive Room
TurnFlagOFF 27 ; player is not in maze
END_COMMAND

COMMAND SOUTHEAST
AtLocation 5 ; Player is located at Globe Room
Present 258 ; HUGE GLOBE is here?
FlagON 7 ; globe counter is on
FlagOFF 8 ; globe has not been spun
FlagOFF 9 ; globe has not been described
PrintMessage 126 ; Before you turn away, you pause to look at the
DescribeThing 258 ; Describe item 258 (HUGE GLOBE)
TurnFlagON 9 ; now it has
DoneWithTurn
END_COMMAND

COMMAND SOUTHEAST
AtLocation 115 ; Player is located at Poetry Center Southeast
FlagOFF 12 ; car has not been named
GoToRoom 118 ; Go to location 118 -- Dark Room
DoneWithTurn
END_COMMAND

COMMAND SOUTHEAST
AtLocation 115 ; Player is located at Poetry Center Southeast
FlagON 12 ; car has been named
GoToRoom 116 ; Go to location 116 -- Poet's Office
DoneWithTurn
END_COMMAND

COMMAND SOUTHEAST
AtLocation 2 ; Player is located at Outside Library
PrintMessage 100 ; You wander around outside for a few minutes, but
DoneWithTurn
END_COMMAND

COMMAND SOUTHWEST
AtLocation 2 ; Player is located at Outside Library
PrintMessage 100 ; You wander around outside for a few minutes, but
DoneWithTurn
END_COMMAND

COMMAND EXIT
AtLocation 116 ; Player is located at Poet's Office
IsCarrying 230 ; ANCIENT PAPYRUS is being carried?
FlagON 11 ; car has been named
PrintMessage 116 ; The papyrus crumbles in your hands.
Destroy 230 ; Destroy noun (ANCIENT PAPYRUS)
END_COMMAND

COMMAND EXIT
AtLocation 116 ; Player is located at Poet's Office
IsCarrying 230 ; ANCIENT PAPYRUS is being carried?
FlagOFF 11 ; car has not been named
PrintMessage 117 ; You start to leave the room, but turn back  
DoneWithTurn
END_COMMAND

COMMAND GIVE ANY TO GUARD
NOUNisCarrying ; $NOUN$ is being carried?
Present 250 ; SECURITY GUARD is here?
PrintMessage 60 ; The humongous giant security guard takes the
DoneWithTurn
END_COMMAND

COMMAND GIVE BIBLE TO GHOST
AtLocation 117 ; Player is located at West Inactive Room
Present 252 ; THREATENING GHOST is here?
IsCarrying 225 ; LEATHER BIBLE is being carried?
PrintMessage 111 ; The ghost takes the Bible from you and studies
Destroy 225 ; Destroy noun (LEATHER BIBLE)
DoneWithTurn
END_COMMAND

COMMAND GIVE PENTATEUCH TO GHOST
AtLocation 117 ; Player is located at West Inactive Room
Present 252 ; THREATENING GHOST is here?
IsCarrying 298 ; ENORMOUS PENTATEUCH is being carried?
PrintMessage 112 ; The ghost takes the Pentateuch from you and
Destroy 252 ; Destroy noun (THREATENING GHOST)
Destroy 298 ; Destroy noun (ENORMOUS PENTATEUCH)
PlusScore 20 ; Add 20 to game score
DoneWithTurn
END_COMMAND

COMMAND GIVE ANY TO GHOST
AtLocation 117 ; Player is located at West Inactive Room
NOUNisCarrying ; $NOUN$ is being carried?
Present 252 ; THREATENING GHOST is here?
PrintMessage 113 ; The ghost takes the $NOUN$ from you, looks at
DoneWithTurn
END_COMMAND

COMMAND GIVE INCUNABULUM TO LIBRARIAN
AtLocation 27 ; Player is located at FHC Office
Present 254 ; THREATENING LIBRARIAN is here?
IsCarrying 296 ; LARGE INCUNABULUM is being carried?
PrintMessage 21 ; Very gingerly, you hand the incunabulum to the
Destroy 254 ; Destroy noun (THREATENING LIBRARIAN)
SendToRoom 255 26 ; Put item (DISTRACTED LIBRARIAN) in room 26 (FHC
Destroy 296 ; Destroy noun (LARGE INCUNABULUM)
PlusScore 20 ; Add 20 to game score
DoneWithTurn
END_COMMAND

COMMAND GIVE KITTEN TO LIBRARIAN
AtLocation 27 ; Player is located at FHC Office
Present 254 ; THREATENING LIBRARIAN is here?
IsCarrying 201 ; GREY KITTEN is being carried?
PrintMessage 22 ; The librarian picks up the kitten and gives it a
TurnFlagON 118 ; Turn flag number 118 ON
Destroy 201 ; Destroy noun (GREY KITTEN)
DoneWithTurn
END_COMMAND

COMMAND GIVE MUG TO LIBRARIAN
ReDirectTo GIVE COFFEE TO LIBRARIAN
END_COMMAND

COMMAND GIVE COFFEE TO LIBRARIAN
AtLocation 27 ; Player is located at FHC Office
Present 254 ; THREATENING LIBRARIAN is here?
IsCarrying 203 ; COFFEE MUG is being carried?
PrintMessage 19 ; The librarian takes the mug from you and drinks
Destroy 203 ; Destroy noun (COFFEE MUG)
DoneWithTurn
END_COMMAND

COMMAND GIVE ANY TO LIBRARIAN
AtLocation 27 ; Player is located at FHC Office
Present 254 ; THREATENING LIBRARIAN is here?
NOUNisCarrying ; $NOUN$ is being carried?
PrintMessage 23 ; The librarian picks up the $NOUN$ and crushes it
DestroyNOUN ; Destroy $NOUN$
DoneWithTurn
END_COMMAND

COMMAND GIVE ANY TO GENIE
NOUNisCarrying ; $NOUN$ is being carried?
Present 251 ; ENORMOUS GENIE is here?
PrintMessage 136 ; The genie takes the $NOUN$ from you, looks at 
DoneWithTurn
END_COMMAND

COMMAND STEAL CHIFFOROBE 
ReDirectTo GET CHIFFOROBE 
END_COMMAND

COMMAND FILL MUG 
NOT Present 214 ; BLACK COFFEE is NOT here?
 OR 
NOT IsCarrying 202 ; COFFEE MUG is NOT being carried?
PrintMessage 65 ; Sorry, you can't do that...
DoneWithTurn
END_COMMAND

COMMAND FILL MUG 
Present 214 ; BLACK COFFEE is here?
ReDirectTo GET COFFEE 
END_COMMAND

COMMAND GET
FlagON 16 ; player has cut off both hands
PrintMessage 156 ; How can you carry anything? You cut off both of
DoneWithTurn
END_COMMAND

COMMAND GET MANUSCRIPT 
AtLocation 198 ; Player is located at Inside the Safe
Present 299 ; VALUABLE MANUSCRIPT is here?
PlusScore 25 ; Add 25 to game score
PrintMessage 14 ; Your courage and skill have brought you to your
WinGame ; Player wins game at end of turn
DoneWithTurn
END_COMMAND

COMMAND GET COFFEE 
IsCarrying 202 ; COFFEE MUG is being carried?
Present 214 ; BLACK COFFEE is here?
SwapLocations 202 203 ; 
PrintMessage 81 ; The mug is now full of coffee.
DoneWithTurn
END_COMMAND

COMMAND GET COFFEE 
NOT IsCarrying 202 ; COFFEE MUG is NOT being carried?
Present 214 ; BLACK COFFEE is here?
PrintMessage 82 ; You don't seem to have anything in which to carry
DoneWithTurn
END_COMMAND

COMMAND GET COFFEE 
IsCarrying 203 ; COFFEE MUG is being carried?
PrintMessage 83 ; Your mug is already filled with coffee. 
DoneWithTurn
END_COMMAND

COMMAND GET COFFEE 
NOT IsCarrying 203 ; COFFEE MUG is NOT being carried?
Present 203 ; COFFEE MUG is here?
GetIt 203 ; Get noun 203 -- COFFEE MUG
PrintMessage 68 ; You are now carrying the mug filled with coffee.
DoneWithTurn
END_COMMAND

COMMAND GET BLOOD 
Present 285 ; DRIED BLOOD is here?
 OR 
Present 286 ; DRIED BLOOD is here?
 OR 
Present 287 ; DRIED BLOOD is here?
 OR 
Present 288 ; DRIED BLOOD is here?
 OR 
Present 289 ; DRIED BLOOD is here?
 OR 
Present 256 ; DRIED BLOOD is here?
PrintMessage 105 ; Ooh gross.
TurnFlagOn 30 ; gross flag
DoneWithTurn
END_COMMAND

COMMAND GET UNIFORM 
Present 256 ; DRIED BLOOD is here?
PrintMessage 105 ; Ooh gross.
TurnFlagOn 30 ; gross flag
DoneWithTurn
END_COMMAND

COMMAND GET GUARD 
Present 256 ; DRIED BLOOD is here?
PrintMessage 105 ; Ooh gross.
TurnFlagOn 30 ; gross flag
DoneWithTurn
END_COMMAND

COMMAND GET MESS 
Present 222 ; KITTEN MESS is here?
PrintMessage 105 ; Ooh gross.
TurnFlagOn 30 ; gross flag
DoneWithTurn
END_COMMAND

COMMAND GET WALLS 
PrintMessage 65 ; Sorry, you can't do that...
DoneWithTurn
END_COMMAND

COMMAND GET CEILING 
PrintMessage 65 ; Sorry, you can't do that...
DoneWithTurn
END_COMMAND

COMMAND GET FLOOR 
PrintMessage 65 ; Sorry, you can't do that...
DoneWithTurn
END_COMMAND

COMMAND GET TERMINAL 
ReDirectTo GET PRINTER 
END_COMMAND

COMMAND GET PRINTER 
PrintMessage 65 ; Sorry, you can't do that...
DoneWithTurn
END_COMMAND

COMMAND GET BLACK CASSETTE 
NOUNIsNumber 221 ; black cassette
AtLocation 147 ; Player is located at Media Stacks
Present 247 ; CASSETTE PLAYER w/black cassette is here?
SendToRoom 247 0 ; put player w/black cassette nowhere
SendToRoom 245 147 ; Put empty player in room 
GetIt 221 ; Get noun 221 -- BLACK CASSETTE
PrintMessage 32 ; You are now carrying the black cassette.
DoneWithTurn
END_COMMAND

COMMAND GET WHITE CASSETTE 
NOUNIsNumber 295 ; white cassette
AtLocation 147 ; Player is located at Media Stacks
Present 248 ; CASSETTE PLAYER w/white cassette is here?
SendToRoom 248 0 ; Put player w/white cassette nowhere
SendToRoom 245 147 ; Put empty player in room
GetIt 295 ; Get noun 295 -- WHITE CASSETTE
PrintMessage 42 ; You are now carrying the white cassette.
DoneWithTurn
END_COMMAND

COMMAND GET CHIFFOROBE 
AtLocation 131 ; Player is located at Featureless Chamber
IsCarrying 291 ; YELLOW PARCHMENT is being carried?
FlagON 5 ; player has read Hazel Motes' note
ClearScreen ; clear the screen
PrintMessage 121 ; You attempt to pick up the chifforobe, but
TurnFlagON 111 ; Turn flag number 111 ON
TurnFlagON 6 ; player has been in featureless chamber once
PlusScore 10 ; Add 10 to game score
WaitForReturn ; Display "Hit RETURN" message
GoToRandomRoom 121 130 ; Go to random location between Twisty
DoneWithTurn
END_COMMAND

COMMAND GET INCUNABULUM 
Present 255 ; DISTRACTED LIBRARIAN is here?
PrintMessage 29 ; Taking it away from the librarian would be
DoneWithTurn
END_COMMAND

COMMAND GET AQUARIUM 
FlagOFF 15 ; player has not cut off a hand
Present 249 ; BROKEN AQUARIUM is here?
PrintMessage 128 ; You reach out to pick up the shards of broken
PutInCurrentRoom 287 ; Put noun (DRIED BLOOD) in current room
PutInCurrentRoom 227 ; Put noun (SEVERED HAND) in current room
TurnFlagON 15 ; player has cut off one hand
KillPlayer ; Kill Player at end of turn!
DoneWithTurn
END_COMMAND

COMMAND GET AQUARIUM 
FlagON 15 ; player has cut off one hand
Present 249 ; BROKEN AQUARIUM is here?
PrintMessage 155 ; You reach out to pick up the shards of broken
DropEverything ; Drop everything!
Destroy 227 ; Destroy noun (SEVERED HAND)
PutInCurrentRoom 228 ; Put noun (SEVERED HANDS) in current room
TurnFlagON 16 ; now player has cut off both hands
KillPlayer ; Kill Player at end of turn!
DoneWithTurn
END_COMMAND

COMMAND GET HAND 
Present 227 ; SEVERED HAND is here?
PrintMessage 105 ; Ooh gross.
TurnFlagOn 30 ; gross flag
DoneWithTurn
END_COMMAND

COMMAND GET TADPOLES 
Present 253 ; WIGGLING TADPOLES is here?
PrintMessage 66 ; You have nothing in which you can carry the
DoneWithTurn
END_COMMAND

COMMAND THROW FLASHLIGHT 
Present 250 ; SECURITY GUARD is here?
IsCarrying 200 ; LARGE FLASHLIGHT is being carried?
ReDirectTo ATTACK GUARD WITH FLASHLIGHT
END_COMMAND

COMMAND ATTACK GUARD WITH KEY
Present 250 ; SECURITY GUARD is here?
IsCarrying 212 ; IRON KEY is being carried?
PrintMessage 64 ; The key is far too heavy to hit anything with.
DoneWithTurn
END_COMMAND

COMMAND ATTACK GUARD WITH FLASHLIGHT
Chance 40 ; 40% of returning TRUE?
Present 250 ; SECURITY GUARD is here?
IsCarrying 200 ; LARGE FLASHLIGHT is being carried?
PrintMessage 56 ; You attempt to hit the humongous giant security
DoneWithTurn
END_COMMAND

COMMAND ATTACK GUARD WITH FLASHLIGHT
Present 250 ; SECURITY GUARD is here?
IsCarrying 200 ; LARGE FLASHLIGHT is being carried?
PrintMessage 57 ; You swing your flashlight at the guard and it
TurnFlagON 107 ; Turn flag number 107 ON
Destroy 250 ; Destroy noun (SECURITY GUARD)
DoneWithTurn
END_COMMAND

COMMAND ATTACK GUARD 
Chance 20 ; 20% of returning TRUE?
Present 250 ; SECURITY GUARD is here?
IsCarrying 200 ; LARGE FLASHLIGHT is being carried?
PrintMessage 54 ; The humongous giant security guard raises his
Destroy 250 ; Destroy noun (SECURITY GUARD)
GoToRoom 2 ; Go to location 2 -- Outside Library
DoneWithTurn
END_COMMAND

COMMAND ATTACK GUARD 
Present 250 ; SECURITY GUARD is here?
IsCarrying 200 ; LARGE FLASHLIGHT is being carried?
PrintMessage 55 ; You try to hit the humongous giant security guard
DoneWithTurn
END_COMMAND

COMMAND ATTACK GUARD 
Present 250 ; SECURITY GUARD is here?
NOT IsCarrying 200 ; LARGE FLASHLIGHT is NOT being carried?
Chance 20 ; 20% of returning TRUE?
PrintMessage 58 ; The humongous giant security guard looks puzzled
EndGame ; Game ends at end of turn
DoneWithTurn
END_COMMAND

COMMAND ATTACK GUARD 
Present 250 ; SECURITY GUARD is here?
NOT IsCarrying 200 ; LARGE FLASHLIGHT is NOT being carried?
PrintMessage 54 ; The humongous giant security guard raises his
Destroy 250 ; Destroy noun (SECURITY GUARD)
GoToRoom 2 ; Go to location 2 -- Outside Library
DoneWithTurn
END_COMMAND

COMMAND ATTACK MACHINE 
ReDirectTo KICK MACHINE 
END_COMMAND

COMMAND ATTACK AQUARIUM 
ReDirectTo DESTROY AQUARIUM 
END_COMMAND

COMMAND KICK MACHINE 
AtLocation 76 ; Player is located at Lounge
Present 206 ; COKE MACHINE is here?
FlagOFF 24 ; player has not put coins in machine
PrintMessage 166 ; I'm afraid that $VERB$ing the coke machine won't
DoneWithTurn
END_COMMAND

COMMAND KICK MACHINE 
AtLocation 76 ; Player is located at Lounge
Present 206 ; COKE MACHINE is here?
FlagON 24 ; player has put coins in machine
PrintMessage 166 ; I'm afraid that $VERB$ing the coke machine won't
PrintMessage 167 ; You should have paid attention to the sign above
DoneWithTurn
END_COMMAND

COMMAND KICK BUTTON 
AtLocation 76 ; Player is located at Lounge
ReDirectTo PUSH BUTTON 
END_COMMAND

COMMAND ATTACK LIBRARIAN 
Present 254 ; THREATENING LIBRARIAN is here?
PrintMessage 27 ; It is impossible to kill the librarian. Maybe if
DoneWithTurn
END_COMMAND

COMMAND ATTACK LIBRARIAN 
Present 255 ; DISTRACTED LIBRARIAN is here?
PrintMessage 28 ; I don't think you should go near her.
DoneWithTurn
END_COMMAND

COMMAND ATTACK GENIE 
Present 251 ; ENORMOUS GENIE is here?
PrintMessage 149 ; That really isn't a good idea.
DoneWithTurn
END_COMMAND

COMMAND ATTACK KITTEN 
Present 201 ; GREY KITTEN is here?
PrintMessage 102 ; You attempt to crush the kitten's tiny skull,
DropEverything ; Drop everything!
GoToRoom 199 ; Go to location 199 -- Cage in Dungeon
DoneWithTurn
END_COMMAND

COMMAND ATTACK ME 
PrintMessage 91 ; As you wish... 
KillPlayer ; Kill Player at end of turn!
DoneWithTurn
END_COMMAND

COMMAND ATTACK YOU 
PrintMessage 96 ; Very well, if you think you can get along without
DropEverything ; Drop everything!
GoToRoom 195 ; Go to location 195 -- none
DoneWithTurn
END_COMMAND

COMMAND ATTACK GHOST 
AtLocation 117 ; Player is located at West Inactive Room
Present 252 ; THREATENING GHOST is here?
PrintMessage 114 ; Trying to kill the ghost isn't very effective,
DoneWithTurn
END_COMMAND

COMMAND ATTACK TADPOLES 
Present 253 ; WIGGLING TADPOLES is here?
PrintMessage 129 ; The only way you can kill the tadpoles is by
DoneWithTurn
END_COMMAND

COMMAND TURN SWITCH 
ReDirectTo PUSH SWITCH 
END_COMMAND

COMMAND PUSH BUTTON 
FlagOFF 26 ; security guard has not exploded
AtLocation 111 ; Player is located at Dungeon
PrintMessage 59 ; You hear a muffled explosion in the distance.
PlusScore 5 ; Add 5 to game score
TurnFlagON 26 ; security guard has exploded
SendToRoom 256 108 ; Put item (DRIED BLOOD) in room 108 
DoneWithTurn
END_COMMAND

COMMAND PUSH SWITCH 
AtLocation 20 ; Player is located at Technical Processing Room
Present 208 ; SMALL SWITCH is here?
SwapLocations 208 209 ; Swap locations of nouns  (SMALL SWITCH) and
PrintMessage 50 ; With great effort, you manage to push the switch
PlusScore 5 ; Add 5 to game score
TurnFlagON 1 ; lights in stacks
DoneWithTurn
END_COMMAND

COMMAND PUSH SWITCH 
AtLocation 20 ; Player is located at Technical Processing Room
Present 209 ; SMALL SWITCH is here?
SwapLocations 209 208 ; Swap locations of nouns  (SMALL SWITCH) and
PrintMessage 51 ; With great effort, you manage to push the switch
MinusScore 5 ; Subtract 5 from game score
TurnFlagOFF 1 ; lights in stacks
DoneWithTurn
END_COMMAND

COMMAND PUSH BUTTON 
AtLocation 76 ; Player is located at Lounge
Present 206 ; COKE MACHINE is here?
PrintMessage 139 ; Nothing happens. 
DoneWithTurn
END_COMMAND

COMMAND TURN GLOBE 
AtLocation 5 ; Player is located at Globe Room
Present 258 ; HUGE GLOBE is here?
FlagOFF 8 ; globe has not been spun
ClearScreen ; clear the screen
PrintMessage 125 ; You give the globe a spin. It turns easily on
SwapLocations 258 259 ; Swap locations of nouns  (HUGE GLOBE) and
PlusScore 20 ; Add 20 to game score
TurnFlagON 8 ; globe has been spun
TurnFlagOFF 7 ; globe counter is off
TurnCounterOFF 1 ; Turn counter number 1 OFF
TurnCounterOFF 2 ; Turn counter number 2 OFF
DoneWithTurn
END_COMMAND

COMMAND PUT KEY IN DOOR
Present 270 ; STEEL DOOR is here?
 OR 
Present 272 ; WOODEN DOOR is here?
 OR 
Present 273 ; STEEL DOOR is here?
 OR 
Present 274 ; STEEL DOOR is here?
 OR 
Present 275 ; IRON DOOR is here?
 OR 
Present 276 ; STEEL DOOR is here?
 OR 
Present 277 ; STEEL DOOR is here?
PrintMessage 76 ; Putting the key in the door doesn't work. Use
DoneWithTurn
END_COMMAND

COMMAND PUT CASSETTE IN PLAYER
NOUNIsNumber 221 ; TRUE if $NOUN$ is NOUN/CREATURE number 221?
AtLocation 147 ; Player is located at Media Stacks
Present 245 ; CASSETTE PLAYER is here?
Present 221 ; BLACK CASSETTE is here?
SendToRoom 245 0 ; Put item (CASSETTE PLAYER) in room 0 (Nowhere)
SendToRoom 221 0 ; Put item (BLACK CASSETTE) in room 0 (Nowhere)
SendToRoom 247 147 ; Put item (CASSETTE PLAYER) in room 147 (Media
PrintMessage 30 ; The black cassette is now in the player.
DoneWithTurn
END_COMMAND

COMMAND PUT CASSETTE IN PLAYER
NOUNIsNumber 221 ; TRUE if $NOUN$ is NOUN/CREATURE number 221?
AtLocation 147 ; Player is located at Media Stacks
Present 248 ; CASSETTE PLAYER is here?
Present 221 ; BLACK CASSETTE is here?
SendToRoom 248 0 ; Put item (CASSETTE PLAYER) in room 0 (Nowhere)
SendToRoom 221 0 ; Put item (BLACK CASSETTE) in room 0 (Nowhere)
SendToRoom 247 147 ; Put item (CASSETTE PLAYER) in room 147 (Media
GetIt 295 ; Get noun 295 -- WHITE CASSETTE
PrintMessage 31 ; The black cassette is now in the player and you
DoneWithTurn
END_COMMAND

COMMAND PUT CASSETTE IN PLAYER
NOUNIsNumber 221 ; TRUE if $NOUN$ is NOUN/CREATURE number 221?
AtLocation 147 ; Player is located at Media Stacks
Present 247 ; CASSETTE PLAYER is here?
PrintMessage 36 ; The black cassette is already in the cassette
DoneWithTurn
END_COMMAND

COMMAND PUT CASSETTE IN PLAYER
NOUNIsNumber 295 ; TRUE if $NOUN$ is NOUN/CREATURE number 295?
AtLocation 147 ; Player is located at Media Stacks
Present 245 ; CASSETTE PLAYER is here?
Present 295 ; WHITE CASSETTE is here?
SendToRoom 245 0 ; Put item (CASSETTE PLAYER) in room 0 (Nowhere)
SendToRoom 295 0 ; Put item (WHITE CASSETTE) in room 0 (Nowhere)
SendToRoom 248 147 ; Put item (CASSETTE PLAYER) in room 147 (Media
PrintMessage 40 ; The white cassette is now in the player.
DoneWithTurn
END_COMMAND

COMMAND PUT CASSETTE IN PLAYER
NOUNIsNumber 295 ; TRUE if $NOUN$ is NOUN/CREATURE number 295?
AtLocation 147 ; Player is located at Media Stacks
Present 247 ; CASSETTE PLAYER is here?
Present 295 ; WHITE CASSETTE is here?
SendToRoom 247 0 ; Put item (CASSETTE PLAYER) in room 0 (Nowhere)
SendToRoom 295 0 ; Put item (WHITE CASSETTE) in room 0 (Nowhere)
SendToRoom 248 147 ; Put item (CASSETTE PLAYER) in room 147 (Media
GetIt 221 ; Get noun 221 -- BLACK CASSETTE
PrintMessage 41 ; The white cassette is now in the player and you
DoneWithTurn
END_COMMAND

COMMAND PUT CASSETTE IN PLAYER
NOUNIsNumber 295 ; TRUE if $NOUN$ is NOUN/CREATURE number 295?
AtLocation 147 ; Player is located at Media Stacks
Present 248 ; CASSETTE PLAYER is here?
PrintMessage 45 ; The white cassette is already in the cassette
DoneWithTurn
END_COMMAND

COMMAND PUT PLATE IN AQUARIUM
AtLocation 27 ; Player is located at FHC Office
Present 254 ; THREATENING LIBRARIAN is here?
IsCarrying 294 ; WHITE PLATE is being carried?
PrintMessage 25 ; You put the plate in the aquarium, and the
Destroy 294 ; Destroy noun (WHITE PLATE)
DoneWithTurn
END_COMMAND

COMMAND PUT PLATE IN AQUARIUM
NOT Present 251 ; ENORMOUS GENIE is NOT here?
ScoreLT 151 ; Score of game is less than 151 points?
AtLocation 27 ; Player is located at FHC Office
Present 253 ; WIGGLING TADPOLES is here?
Present 240 ; RECTANGULAR AQUARIUM is here?
IsCarrying 294 ; WHITE PLATE is being carried?
PrintMessage 131 ; Nothing happens. You take the plate out of the
DoneWithTurn
END_COMMAND

COMMAND PUT PLATE IN AQUARIUM
ScoreGT 150 ; Score of game is greater than 150 points?
AtLocation 27 ; Player is located at FHC Office
Present 253 ; WIGGLING TADPOLES is here?
Present 240 ; RECTANGULAR AQUARIUM is here?
IsCarrying 294 ; WHITE PLATE is being carried?
PrintMessage 130 ; You put the plate in the aquarium. The tadpoles
SendToRoom 251 27 ; Put item (ENORMOUS GENIE) in room 27 (FHC
DescribeThing 251 ; Describe item 251 (ENORMOUS GENIE)
Destroy 253 ; Destroy noun (WIGGLING TADPOLES)
Destroy 240 ; Destroy noun (RECTANGULAR AQUARIUM)
Destroy 294 ; Destroy noun (WHITE PLATE)
PlusScore 35 ; Add 35 to game score
BlankLine ; print blank line
PrintMessage 133 ; The genie speaks: "WHAT DOES MY MASTER WISH" 
DoneWithTurn
END_COMMAND

COMMAND PUT COINS IN MACHINE
AtLocation 76 ; Player is located at Lounge
Present 206 ; COKE MACHINE is here?
IsCarrying 207 ; SEVERAL COINS is being carried?
PrintMessage 165 ; The coins disappear into the slot of the
TurnFlagON 24 ; coins have been fed into machine
Destroy 207 ; Destroy noun (SEVERAL COINS)
DoneWithTurn
END_COMMAND

COMMAND PUT COFFEE IN MUG
NOT Present 214 ; BLACK COFFEE is NOT here?
 OR 
NOT IsCarrying 202 ; COFFEE MUG is NOT being carried?
PrintMessage 65 ; Sorry, you can't do that...
DoneWithTurn
END_COMMAND

COMMAND PUT COFFEE IN MUG
Present 214 ; BLACK COFFEE is here?
ReDirectTo GET COFFEE 
END_COMMAND

COMMAND PUT COFFEE IN DOOR
AtLocation 17 ; Player is located at Secretary's Office
ReDirectTo DROP COFFEE 
END_COMMAND

COMMAND POUR COFFEE 
ReDirectTo DROP COFFEE 
END_COMMAND

COMMAND DROP COFFEE 
NOT IsCarrying 203 ; COFFEE MUG is NOT being carried?
PrintMessage 115 ; You aren't carrying it!  
DoneWithTurn
END_COMMAND

COMMAND DROP COFFEE 
AtLocation 17 ; Player is located at Secretary's Office
Present 280 ; WOODEN DOOR is here?
IsCarrying 203 ; COFFEE MUG is being carried?
SwapLocations 280 281 ; Swap locations of nouns (WOODEN DOOR) and
PrintMessage 80 ; Slowly and carefully, you pour the coffee into
PlusScore 10 ; Add 10 to game score
SwapLocations 203 202 ; Swap locations of nouns  (COFFEE MUG) and
DoneWithTurn
END_COMMAND

COMMAND DROP COFFEE 
IsCarrying 203 ; COFFEE MUG is being carried?
SwapLocations 203 202 ; Swap locations of nouns (COFFEE MUG) and
PrintMessage 84 ; You pour the coffee out of the mug. As it hits
PrintMessage 85 ; Your mug is now empty.
DoneWithTurn
END_COMMAND

COMMAND DRINK COFFEE 
Present 203 ; COFFEE MUG is here?
SwapLocations 203 202 ; Swap locations of nouns  (COFFEE MUG) and
PrintMessage 86 ; The coffee tastes terrible. Seconds after you
KillPlayer ; Kill Player at end of turn!
DoneWithTurn
END_COMMAND

COMMAND DRINK BLOOD 
Present 285 ; DRIED BLOOD is here?
 OR 
Present 286 ; DRIED BLOOD is here?
 OR 
Present 287 ; DRIED BLOOD is here?
 OR 
Present 288 ; DRIED BLOOD is here?
 OR 
Present 289 ; DRIED BLOOD is here?
PrintMessage 106 ; The blood is too dry for you to drink.  
DoneWithTurn
END_COMMAND

COMMAND KISS LIBRARIAN 
Present 255 ; DISTRACTED LIBRARIAN is here?
PrintMessage 28 ; I don't think you should go near her.
DoneWithTurn
END_COMMAND

COMMAND KISS LIBRARIAN 
Present 254 ; THREATENING LIBRARIAN is here?
PrintMessage 15 ; The $NOUN$ resists your advances.  
DoneWithTurn
END_COMMAND

COMMAND KISS GUARD 
Present 250 ; SECURITY GUARD is here?
PrintMessage 15 ; The $NOUN$ resists your advances.  
DoneWithTurn
END_COMMAND

COMMAND KISS GHOST 
Present 252 ; THREATENING GHOST is here?
PrintMessage 15 ; The $NOUN$ resists your advances.  
DoneWithTurn
END_COMMAND

COMMAND PET LIBRARIAN 
Present 255 ; DISTRACTED LIBRARIAN is here?
PrintMessage 28 ; I don't think you should go near her.
DoneWithTurn
END_COMMAND

COMMAND PET LIBRARIAN 
AtLocation 27 ; Player is located at FHC Office
Present 254 ; THREATENING LIBRARIAN is here?
PrintMessage 24 ; You attempt to hug the librarian, but she seizes
KillPlayer ; Kill Player at end of turn!
DoneWithTurn
END_COMMAND

COMMAND EAT BLOOD 
Present 285 ; DRIED BLOOD is here?
 OR 
Present 286 ; DRIED BLOOD is here?
 OR 
Present 287 ; DRIED BLOOD is here?
 OR 
Present 288 ; DRIED BLOOD is here?
 OR 
Present 289 ; DRIED BLOOD is here?
PrintMessage 105 ; Ooh gross.
TurnFlagOn 30 ; gross flag
DoneWithTurn
END_COMMAND

COMMAND EAT KITTEN 
ReDirectTo ATTACK KITTEN 
END_COMMAND

COMMAND FIAT LUX 
AtLocation 144 ; Player is located at Media Center
NOT IsCarrying 201 ; GREY KITTEN is NOT being carried?
FlagON 12 ; car has been named
PrintMessage 95 ; Nope.
DoneWithTurn
END_COMMAND

COMMAND FIAT
NOT AtLocation 118 ; Player is NOT located at Dark Room
PrintMessage 139 ; Nothing happens. 
DoneWithTurn
END_COMMAND

COMMAND FIAT
AtLocation 118 ; Player is located at Dark Room
PrintMessage 119 ; The lights flicker momentarily. 
TurnFlagON 28 ; player has said "Fiat" in dark room
END_COMMAND

COMMAND FIAT LUX 
AtLocation 118 ; Player is located at Dark Room
TurnFlagON 12 ; player has named car
GoToRoom 116 ; Go to location 116 -- Poet's Office
RelocateAll 118 116 ;send everything to poet's office
PrintMessage 120 ;the lights come on
PlusScore 20
LookAtRoom
DoneWithTurn
END_COMMAND

; examine commands
; note: reconstructed commands begin here

COMMAND EXAMINE SIGN
ReDirectTo READ SIGN
END_COMMAND

COMMAND EXAMINE BUTTON
AtLocation 76 ;lounge
PrintMessage 6 ;you see nothing unusual
DoneWithTurn
END_COMMAND

COMMAND EXAMINE TERMINAL
AtLocation 15 ;copier room
PrintMessage 6 ;you see nothing unusual
DoneWithTurn
END_COMMAND

COMMAND EXAMINE PRINTER
AtLocation 15 ;copier room
PrintMessage 6 ;you see nothing unusual
DoneWithTurn
END_COMMAND

COMMAND EXAMINE NAMEPLATE
Present 250 ;security guard
PrintMessage 67 ;rex fisher
DoneWithTurn
END_COMMAND

COMMAND EXAMINE BLACK CASSETTE
NounIsNumber 221 ;black cassette
Present 247 ;player with black cassette
DescribeThing 221 ;black cassette
DoneWithTurn
END_COMMAND

COMMAND EXAMINE WHITE CASSETTE
NounIsNumber 295
Present 248 ;player with white tape
DescribeThing 295 ;white cassette
DoneWithTurn
END_COMMAND

COMMAND EXAMINE BOOK
Present 223 ;five red herrings
TurnFlagOn 108 ;player can read note 8
END_COMMAND

COMMAND EXAMINE CEILING
Present 256 ; exploded guard
DescribeThing 256 ; exploded guard
DoneWithTurn
END_COMMAND

COMMAND EXAMINE WALLS
Present 256 ; exploded guard
DescribeThing 256 ; exploded guard
DoneWithTurn
END_COMMAND

COMMAND EXAMINE UNIFORM
Present 256 ; exploded guard
DescribeThing 256 ; exploded guard
DoneWithTurn
END_COMMAND

COMMAND EXAMINE FLOOR
Present 256 ; exploded guard
DescribeThing 256 ; exploded guard
DoneWithTurn
END_COMMAND


; read commands

COMMAND READ PENTATEUCH
Present 298 ;pentateuch
PrintMessage 49 ;you read the first word
GoToRoom 2 ;outside library
DoneWithTurn
END_COMMAND

COMMAND READ SIGN
AtLocation 141 ;outside media center
PrintMessage 78 ;medea center
DoneWithTurn
END_COMMAND

COMMAND READ SIGN
AtLocation 76 ;lounge
PrintMessage 79 ;out of order
DoneWithTurn
END_COMMAND

COMMAND READ SIGN
AtLocation 103 ;ease inactive room
PrintMessage 13 ;abandon all hope
TurnFlagOn 105 ;player can read note 5
DoneWithTurn
END_COMMAND

COMMAND READ PAPYRUS
AtLocation 116 ;poet's office
Present 230 ;papyrus
Not IsCarrying 230 ;papyrus
PrintMessage 115 ;you aren't carrying it
DoneWithTurn
END_COMMAND

COMMAND READ PAPYRUS
AtLocation 116 ;poet's office
IsCarrying 230 ;papyrus
PrintMessage 118 ;the white plate represents the ovum
TurnFlagOn 11 ;clue has been read
DoneWithTurn
END_COMMAND

COMMAND READ TERMINAL
ReDirectTo EXAMINE TERMINAL
END_COMMAND

COMMAND READ PRINTER
ReDirectTo EXAMINE PRINTER
END_COMMAND

COMMAND READ TABLET
FlagOff 4 ;tape has not been played
PrintMessage 47 ;sonnet in linear b
DoneWithTurn
END_COMMAND

COMMAND READ TABLET
Present 292 ;clay tablet
FlagOn 4 ;tape has been played
PrintMessage 48 ;sonnet in English
DoneWithTurn
END_COMMAND

COMMAND READ NOTE
AtLocation 131 ;featureless chamber
Present 231 ;Hazel Motes' note
TurnFlagOn 5 ;player must read note to leave room
TurnFlagOn 121 ;player can read note 21
END_COMMAND

COMMAND READ LEAFLET
Present 234 ;green leaflet
PrintMessage 10 ;conventions of game
ClearScreen
PrintMessage 11 ;who cares
TurnFlagOn 101 ;player can read note 1
Delay 2
ClearScreen
LookAtRoom
DoneWithTurn
END_COMMAND

COMMAND READ WALLS
AtLocation 73 ;ladies' convenience
RandomMessage 176 244 ;includes gender-specific messages
TurnFlagOn 113 ;graffiti flag
DoneWithTurn
END_COMMAND

COMMAND READ GRAFFITI
AtLocation 73 ;ladies' convenience
RandomMessage 176 244 ;includes gender-specific messages
TurnFlagOn 113 ;graffiti flag
DoneWithTurn
END_COMMAND

COMMAND READ WALLS
AtLocation 75 ;gent's convenience
RandomMessage 179 250 ;includes gender-specific messages
TurnFlagOn 113 ;graffiti flag
DoneWithTurn
END_COMMAND

COMMAND READ GRAFFITI
AtLocation 75 ;gent's convenience
RandomMessage 179 250 ;includes gender-specific messages
TurnFlagOn 113 ;graffiti flag
DoneWithTurn
END_COMMAND

COMMAND READ DESKS
Present 244 ;desks in inactive room
RandomMessage 179 231 ;non-bathroom messages
TurnFlagOn 113 ;graffiti flag
DoneWithTurn
END_COMMAND

COMMAND READ GRAFFITI
Present 244 ;desks in inactive room
RandomMessage 179 231 ;non-bathroom messages
TurnFlagOn 113 ;graffiti flag
DoneWithTurn
END_COMMAND

COMMAND READ BOOK
Present 223 ;five red herrings
TurnFlagOn 19 ;player has tried to read book
END_COMMAND

COMMAND READ BIBLE
Present 225 ;bible
TurnFlagOn 110 ;player can read note 10
END_COMMAND

COMMAND READ BLACK CASSETTE 
NounIsNumber 221
Present 247 ;player with black cassette
PrintMessage 9 ;the label is obscured by the player
DoneWithTurn
END_COMMAND

COMMAND READ WHITE CASSETTE
NounIsNumber 295 ;white cassette
Present 295
TurnFlagOn 103 ;player can read note 3
END_COMMAND

COMMAND READ WHITE CASSETTE
NounIsNumber 295 ;white cassette
Present 248 ;player with white cassette
PrintMessage 9 ;the label is obscured by the player
DoneWithTurn
END_COMMAND

;same as EXAMINE NAMEPLATE
COMMAND READ NAMEPLATE 
Present 250 ;security guard
PrintMessage 67 ;the guard's name is rex fisher
DoneWithTurn
END_COMMAND

; vulgar word commands

COMMAND SHIT
FlagOff 13 ;this is the first time
PrintMessage 92 ;first warning
TurnFlagOn 13 ;once
DoneWithTurn
END_COMMAND

command shit
FlagOn 13 ;once
FlagOff 14 ;but not twice
PrintMessage 93 ;second warning
TurnFlagOn 14 ;twice
DoneWithTurn
END_COMMAND

COMMAND SHIT
FlagOn 13 ;once
FlagOn 14 ;and twice
PrintMessage 94 ;librarian has had enough
DropEverything
GoToRoom 199 ;cage
DoneWithTurn ;and done with game
END_COMMAND ;serves foul-mouthed players right

; play commands

COMMAND PLAY BLACK CASSETTE
NounIsNumber 221 ;black cassette
AtLocation 147 ;media collection
Present 247 ;player w/black cassette
FlagOff 2 ;cassette has not been played once
PrintMessage 33 ;you hear heavy metal lute music
TurnFlagOn 112 ;player can read note 112
TurnFlagOn 2 ;black cassette played once
SendToRoom 226 147 ;chunks of plaster
DoneWithTurn
END_COMMAND

COMMAND PLAY BLACK CASSETTE
NounIsNumber 221 ; black cassette
AtLocation  147 ;media collection
Present 247 ;player w/black cassette
FlagOn 2 ;cassette has already been played once
TurnFlagOn 3 ;ceiling has collapsed
PrintMessage 34 ;ceiling has collapsed
SendToRoom 229 146 ;put fallen plaster to west of card catalog
KillPlayer ;oops
DoneWithTurn
END_COMMAND

COMMAND PLAY WHITE CASSETTE
NounIsNumber 295 ;white cassette
AtLocation 147 ;media collection
Present 248 ;player with white cassette
FlagOff 4 ;cassette has not been played once
PrintMessage 46 ;a voice begins to drone
PlusScore 15
TurnFlagOn 4 ;cassette has been played once
DoneWithTurn
END_COMMAND

COMMAND PLAY WHITE CASSETTE
NounIsNumber 295 ;white cassette
AtLocation 147 ;media collection
Present 248 ;player w/white cassette
FlagOn 4 ;cassette has been played once
PrintMessage 44 ;the rewinding mechanism is broken
DoneWithTurn
END_COMMAND

; touch commands

COMMAND TOUCH AQUARIUM
Present 249 ;broken aquarium
ReDirectTo TAKE AQUARIUM
END_COMMAND

COMMAND TOUCH SAFE
NOT Present 251 ;genie
ReDirectTo OPEN SAFE
END_COMMAND

COMMAND TOUCH SAFE
Present 251 ;genie
PrintMessage 147 ;receive shock
DoneWithTurn
END_COMMAND

; unlock commands

COMMAND UNLOCK SAFE
ReDirectTo OPEN SAFE
END_COMMAND

; open commands

COMMAND OPEN SAFE
AtLocation 27 ;fhc office
Present 254 ;angry librarian
PrintMessage 26 ;the librarian will not let you near
DoneWithTurn
END_COMMAND

COMMAND OPEN SAFE
AtLocation 27 ;FHC office
Present 282 ;closed safe
NOT Present 251 ;genie
PrintMessage 147 ;painful shock
DoneWithTurn
END_COMMAND

COMMAND OPEN SAFE
AtLocation 27 ;FHC office
Present 283 ;open safe
PrintMessage 145 ;the safe is already open
DoneWithTurn
END_COMMAND

COMMAND OPEN SAFE
AtLocation 27 ;FHC office
Present 251 ;genie
PrintMessage 137 ;I can if you tell me the combination
AskQuestion 1 ;what is the first number
TurnFlagOn 21 ;first question has been asked
BlankLine
AnswerIsCorrect
IsCarrying 290 ;paper--first number
BlankLine
PrintMessage 138 ;correct
TurnFlagOff 21 ;first answer is correct
AskQuestion 2 ;what is the second number
TurnFlagOn 22 ;second question has been asked
TurnFlagOn 252 ;temporary flag
END_COMMAND

;continuation of previous command
COMMAND OPEN SAFE
FlagOn 252 ;temporary flag
TurnFlagOff 252 
AnswerIsCorrect ;second answer
IsCarrying 291 ;parchment--second number
TurnFlagOff 22 ;second question is correct
BlankLine
PrintMessage 138 ;correct
AskQuestion 3 
TurnFlagOn 23 ;third question has been asked
BlankLine
AnswerIsCorrect ;third question
IsCarrying 292 ;tablet--third number
FlagOn 4 ;player knows linear B
TurnFlagOn 251 ;temporary flag
END_COMMAND

;continuation of previous command
COMMAND OPEN SAFE
FlagOn 251 ;temporary flag
TurnFlagOff 251 
PrintMessage 144 ;the genie opens the safe
PlusScore 25
SwapLocations 282 283 ;swap open safe for closed one
Destroy 251 ;in a puff of smoke
BlankLine
DescribeThing 283 ;the open safe
DoneWithTurn
END_COMMAND

;player is not carrying paper
COMMAND OPEN SAFE
FlagOn 21 ;first question has been asked
NOT IsCarrying 290 ;white paper
BlankLine
PrintMessage 141 ;you need to have the materials with you
TurnFlagOff 21
DoneWithTurn
END_COMMAND

;player is wrong with first answer
COMMAND OPEN SAFE
FlagOn 21 ;first question has been asked
BlankLine
PrintMessage 140 ;wrong--begin again
TurnFlagOff 21
DoneWithTurn
END_COMMAND

;player is not carrying parchment
COMMAND OPEN SAFE
FlagOn 22 ;second question has been asked
NOT IsCarrying 291 ;parchment
BlankLine
PrintMessage 141 ;you need to have the materials with you
TurnFlagOff 22
DoneWithTurn
END_COMMAND

;player is wrong with second answer
COMMAND OPEN SAFE
FlagOn 22 ;second question has been asked
BlankLine
PrintMessage 140 ;wrong--begin again
TurnFlagOff 22
DoneWithTurn
END_COMMAND

;player is not carrying clay tablet
COMMAND OPEN SAFE
FlagOn 23 ;third question has been asked
NOT IsCarrying 292 ;clay tablet
BlankLine
PrintMessage 141 ;you need to have the materials with you
TurnFlagOff 23
DoneWithTurn
END_COMMAND

;player does not know Linear B
COMMAND OPEN SAFE
FlagOn 23 ;third question has been asked
IsCarrying 292 ;clay tablet
FlagOff 4 ;player does not know Linear B
BlankLine
PrintMessage 142 ;learn it, then try again
TurnFlagOff 23
DoneWithTurn
END_COMMAND

;player is wrong with third answer
COMMAND OPEN SAFE
FlagOn 23 ;third question has been asked
BlankLine
PrintMessage 140 ;wrong--begin again
TurnFlagOff 23
DoneWithTurn
END_COMMAND

COMMAND OPEN DROP
Present 242 ;book drop
IsUnlocked 242 
IsClosed 242
SomethingInside 242
OpenIt 242
PrintMessage 157 ;the noun is now open
ShowContents 242
DoneWithTurn
END_COMMAND

COMMAND OPEN POT
Present 243 ;coffee pot
IsClosed 243
SomethingInside 243
OpenIt 243
PrintMessage 157 ;the noun is now open
ShowContents 243
DoneWithTurn
END_COMMAND

COMMAND OPEN CHIFFOROBE
Present 241 ;chifforobe
IsClosed 241
SomethingInside 241
OpenIt 241
PrintMessage 157 ;the noun is now open
ShowContents 241 ;look inside it
DoneWithTurn
END_COMMAND

; close commands

COMMAND CLOSE SAFE
AtLocation 27 ;FHC office
Present 283 ;open safe
PrintMessage 146 ;player is driven back by electric shock
DoneWithTurn
END_COMMAND

COMMAND CLOSE DOOR
AtLocation 3 ;antechamber
PrintMessage 69 ;you can't
DoneWithTurn
END_COMMAND

; lock commands

COMMAND LOCK DOOR
AtLocation 3 ;antechamber
PrintMessage 69 ;you can't
DoneWithTurn
END_COMMAND

; mortis commands

COMMAND MORTIS
FlagOn 10 ;this has been done before
PrintMessage 16 ;only once
DoneWithTurn
END_COMMAND

COMMAND MORTIS
FlagOff 10 ;this hasn't been done before
PrintMessage 17 ;where player can die
TurnFlagOn 10 ;only once
DoneWithTurn
END_COMMAND

; help commands

COMMAND HELP
AtLocation 118 ;dark room
FlagOn 28 ;player has said "Fiat"
PrintMessage 107 ;try roman numerals
DoneWithTurn
END_COMMAND

COMMAND HELP
AtLocation 64 ;east h-pr room
FlagOn 19 ;book has been read
Present 223 ;five red herrings
PrintMessage 98 ;title and author
DoneWithTurn
END_COMMAND

; footnote commands

COMMAND 1
FlagOn 101
PrintMessage 109
TurnFlagOff 101
DoneWithTurn
END_COMMAND

COMMAND 1
FlagOff 
PrintMessage 7 ;you can't see it
DoneWithTurn
END_COMMAND

COMMAND 2
AtLocation 4 ;in Carnegie room
PrintMessage 134
DoneWithTurn
END_COMMAND

COMMAND 2
NOT AtLocation 4 ;most of library
PrintMessage 7 ;you can't see it
DoneWithTurn
END_COMMAND

COMMAND 3
FlagOn 103
PrintMessage 135
TurnFlagOff 103
DoneWithTurn
END_COMMAND

COMMAND 3
FlagOff 103
PrintMessage 7 ;you can't see it
DoneWithTurn
END_COMMAND

COMMAND 4
FlagOn 104
PrintMessage 143
TurnFlagOff 104
DoneWithTurn
END_COMMAND

COMMAND 4
FlagOff 104
PrintMessage 7 ;you can't see it
DoneWithTurn
END_COMMAND

COMMAND 5
FlagOn 105
PrintMessage 150
TurnFlagOff 105
DoneWithTurn
END_COMMAND

COMMAND 5
FlagOff 105
PrintMessage 7 ;you can't see it
DoneWithTurn
END_COMMAND

COMMAND 6
FlagOn 106
PrintMessage 151
TurnFlagOff 106
DoneWithTurn
END_COMMAND

COMMAND 6
FlagOff 106
PrintMessage 7 ;you can't see it
DoneWithTurn
END_COMMAND

COMMAND 7
FlagOn 107
PrintMessage 152
TurnFlagOff 107
DoneWithTurn
END_COMMAND

COMMAND 7
FlagOff 107
PrintMessage 7 ;you can't see it
DoneWithTurn
END_COMMAND

COMMAND 8
FlagOn 108
PrintMessage 153
TurnFlagOff 108
DoneWithTurn
END_COMMAND

COMMAND 8
FlagOff 108
PrintMessage 7 ;you can't see it
DoneWithTurn
END_COMMAND

COMMAND 9
FlagOn 109
PrintMessage 154
TurnFlagOff 109
DoneWithTurn
END_COMMAND

COMMAND 9
FlagOff 109
PrintMessage 7 ;you can't see it
DoneWithTurn
END_COMMAND

COMMAND 10
FlagOn 110
PrintMessage 158
TurnFlagOff 110
DoneWithTurn
END_COMMAND

COMMAND 10
FlagOff 110
PrintMessage 7 ;you can't see it
DoneWithTurn
END_COMMAND

COMMAND 11
FlagOn 111
PrintMessage 159
TurnFlagOff 111
DoneWithTurn
END_COMMAND

COMMAND 11
FlagOff 111
PrintMessage 7 ;you can't see it
DoneWithTurn
END_COMMAND

COMMAND 12
FlagOn 112
PrintMessage 168
TurnFlagOff 112
DoneWithTurn
END_COMMAND

COMMAND 12
FlagOff 112
PrintMessage 7 ;you can't see it
DoneWithTurn
END_COMMAND

COMMAND 13
FlagOn 113
PrintMessage 169
TurnFlagOff 113
DoneWithTurn
END_COMMAND

COMMAND 13
FlagOff 113
PrintMessage 7 ;you can't see it
DoneWithTurn
END_COMMAND

COMMAND 14
FlagOn 113
PrintMessage 170
TurnFlagOff 113
DoneWithTurn
END_COMMAND

COMMAND 14
FlagOff 113
PrintMessage 7 ;you can't see it
DoneWithTurn
END_COMMAND

COMMAND 15
FlagOn 113
PrintMessage 171
TurnFlagOff 113
DoneWithTurn
END_COMMAND

COMMAND 15
FlagOff 113
PrintMessage 7 ;you can't see it
DoneWithTurn
END_COMMAND

COMMAND 16
FlagOn 113
PrintMessage 172
TurnFlagOff 113
DoneWithTurn
END_COMMAND

COMMAND 16
FlagOff 113
PrintMessage 7 ;you can't see it
DoneWithTurn
END_COMMAND

COMMAND 17
FlagOn 113
PrintMessage 173
TurnFlagOff 113
DoneWithTurn
END_COMMAND

COMMAND 17
FlagOff 113
PrintMessage 7 ;you can't see it
DoneWithTurn
END_COMMAND

COMMAND 18
FlagOn 118
PrintMessage 174
TurnFlagOff 118
DoneWithTurn
END_COMMAND

COMMAND 18
FlagOff 118
PrintMessage 7 ;you can't see it
DoneWithTurn
END_COMMAND

COMMAND 19
FlagOn 119
PrintMessage 175
TurnFlagOff 119
DoneWithTurn
END_COMMAND

COMMAND 19
FlagOff 119
PrintMessage 7 ;you can't see it
DoneWithTurn
END_COMMAND

COMMAND 20
FlagOn 113
PrintMessage 108
TurnFlagOff 113
DoneWithTurn
END_COMMAND

COMMAND 20
FlagOff 113
PrintMessage 7 ;you can't see it
DoneWithTurn
END_COMMAND

COMMAND 21
FlagOn 121
PrintMessage 164
TurnFlagOff 121
DoneWithTurn
END_COMMAND

COMMAND 21
FlagOff 121
PrintMessage 7 ;you can't see it
DoneWithTurn
END_COMMAND

COMMAND 22
FlagOn 124
PrintMessage 87
TurnFlagOff 124
DoneWithTurn
END_COMMAND

COMMAND 22
FlagOff 124
PrintMessage 7 ;you can't see it
DoneWithTurn
END_COMMAND

COMMAND 23
FlagOn 124
PrintMessage 88
TurnFlagOff 124
DoneWithTurn
END_COMMAND

COMMAND 23
FlagOff 124
PrintMessage 7 ;you can't see it
DoneWithTurn
END_COMMAND

COMMAND 24
FlagOn 124
PrintMessage 89
TurnFlagOff 124
DoneWithTurn
END_COMMAND

COMMAND 24
FlagOff 124
PrintMessage 7 ;you can't see it
DoneWithTurn
END_COMMAND

COMMAND 144
FlagOn 30 ;gross flag
PrintMessage 105 ; ooh gross
DoneWithTurn
END_COMMAND

COMMAND 144
FlagOff 30 ;gross flag
PrintMessage 7 ; you can't see it
DoneWithTurn
END_COMMAND

; other commands

COMMAND BRIEF
PrintMessage 1
END_COMMAND

COMMAND VERBOSE
PrintMessage 2
END_COMMAND

COMMAND XYZZY
PrintMessage 3 ;try the cave
DoneWithTurn
END_COMMAND

COMMAND BIBLIOGRAPHY
PrintMessage 8 ;bibliography
DoneWithTurn
END_COMMAND

COMMAND PET KITTEN
Present 201 ;lucifer
PrintMessage 101 ;the kitten purrs happily
DoneWithTurn
END_COMMAND

COMMAND PLEH
PrintMessage 90 ;.ereh, now...
DoneWithTurn
END_COMMAND

COMMAND DESTROY AQUARIUM
Present 240 ;aquarium
PrintMessage 127 ;the aquarium breaks
Destroy 240 ;aquarium
Destroy 253 ;tadpoles
PutInCurrentRoom 249 ;broken aquarium
DoneWithTurn
END_COMMAND

COMMAND ENTER SAFE
AtLocation 27 ;FHC office
Present 283 ;open safe
GoToRoom 198 ;inside the safe
DoneWithTurn
END_COMMAND

COMMAND JESUS
PrintMessage 18 ;Jesus been a long time gone
TurnFlagOn 119 ;player can read note 19
DoneWithTurn
END_COMMAND

COMMAND PLACATE
Present 252 ;ghost
PrintMessage 12 ;be more specific
DoneWithTurn
END_COMMAND

; ALA enhanced commands (FlagOn 18)

COMMAND ALA
FlagOff 17 ;player has not been identified as an ALA member
PrintMessage 160 ;you can tell me the secret word
AskQuestion 6 ;you know what it is
TurnFlagOn 254 ;temporary flag
AnswerIsCorrect ;continue if it is
ClearScreen ;clear screen
PrintMessage 161 ;shows benefits
TurnFlagOn 17 ;player is identified as ALA member
TurnFlagOn 18 ;ALA commands are working
TurnFlagOff 254 ;temporary flag
DoneWithTurn
END_COMMAND

COMMAND ALA
FlagOn 254 ;answer is wrong
TurnFlagOff 254 ;temporary flag
PrintMessage 163 ;nope
DoneWithTurn
END_COMMAND

COMMAND ALA
FlagOn 17 ;player has been identified as an ALA member
ToggleFlag 18 ;commands don't work now
PrintMessage 162 ;think you for using...
DoneWithTurn
END_COMMAND

COMMAND DEBUG
FlagOn 18 ;commands work
PrintMessage 162 ;thank you
ToggleFlag 0
END_COMMAND

COMMAND DEBUG
FlagOff 18 ;commands don't work
PrintMessage 139 ;nothing happens
DoneWithTurn
END_COMMAND

COMMAND FIND ANY
FlagOn 18 ;commands work
NOUNIsMovable
PutNOUNinCurrentRoom ;get it
PrintMessage 162 ;thank you
DoneWithTurn
END_COMMAND

COMMAND FIND ANY
FlagOn 18 ;commands work
NOT NOUNIsMovable ;the noun can't be moved
PrintMessage 97 ;find it yourself
DoneWithTurn
END_COMMAND

COMMAND FIND
FlagOff 18 ;commands don't work
PrintMessage 97 ;find it yourself
DoneWithTurn
END_COMMAND

COMMAND GUARDOFF
FlagOn 18 ;commands work
TurnFlagOn 26 ;guard cannot appear
PrintMessage 162 ;thank you...
DoneWithTurn
END_COMMAND

COMMAND GUARDOFF
FlagOff 18 ;commands don't work
PrintMessage 139 ;nothing happens
DoneWithTurn
END_COMMAND

COMMAND GUARDON
FlagOn 18 ;commands work
TurnFlagOff 26 ;guard can appear
PrintMessage 162 ;thank you
DoneWithTurn
END_COMMAND

COMMAND GUARDON
FlagOff 18 ;commands don't work
PrintMessage 139 ;nothing happens
DoneWithTurn
END_COMMAND

COMMAND STACKON
FlagOn 18 ;commands work
TurnFlagOn 1 ;turn on lights in stacks
PrintMessage 162 ;thank you
DoneWithTurn
END_COMMAND

COMMAND STACKON
FlagOff 18 ;commands don't work
PrintMessage 139 ;nothing happens
DoneWithTurn
END_COMMAND

COMMAND STACKOFF
FlagOn 18 ;commands work
TurnFlagOff 1 ;lights in stacks are off
PrintMessage 162 ;think you
DoneWithTurn
END_COMMAND

COMMAND STACKOFF
FlagOff 18 ;commands don't work
PrintMessage 139 ;nothing happens
DoneWithTurn
END_COMMAND

; look commands

COMMAND LOOK
AtLocation 76 ;lounge
TurnFlagOn 109 ;player can read note 9
END_COMMAND

COMMAND LOOK
AtLocation 40 ;tech proc room
TurnFlagOn 104 ;player can read note 4
END_COMMAND

COMMAND LOOK
AtLocation 111 ;dungeon
TurnFlagOn 106 ;player can read note 6
END_COMMAND

COMMAND LOOK
AtLocation 64 ;east H-PR room
TurnFlagOn 108 ;player can read note 8
END_COMMAND

COMMAND LOOK
AtLocation 103 ;east inactive room
TurnFlagOn 105 ;player can read note 5
END_COMMAND

; final command to trap ctrl-c

COMMAND SLEEP
TimePasses
DoneWithTurn
END_COMMAND

